home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 7
/
BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso
/
Files
/
Hyper
/
Ap-Az
/
AutoScripter.cpt
/
AutoScripter
/
card_5252.txt
< prev
next >
Wrap
Text File
|
1988-03-05
|
10KB
|
492 lines
-- card: 5252 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 2786
-- name: visuals
----- HyperTalk script -----
on opencard
flash 4
repeat with counter = 10 to 21
hide button counter
end repeat
end opencard
-- part 1 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=17 top=130 right=152 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: dissolve
----- HyperTalk script -----
on mouseUp
global holder
put "dissolve " after holder
repeat with counter = 18 to 21
show button counter
end repeat
end mouseUp
-- part 2 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=17 top=160 right=182 bottom=117
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: scroll
----- HyperTalk script -----
on mouseUp
global holder
put "scroll " after holder
repeat with counter = 10 to 13
show button counter
end repeat
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=18 top=190 right=212 bottom=118
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: barn door
----- HyperTalk script -----
on mouseUp
global holder
put "barn door " after holder
repeat with counter = 14 to 15
show button counter
end repeat
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=18 top=220 right=242 bottom=118
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: iris
----- HyperTalk script -----
on mouseUp
global holder
put "iris " after holder
repeat with counter = 14 to 15
show button counter
end repeat
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=133 top=131 right=153 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: wipe
----- HyperTalk script -----
on mouseUp
global holder
put "wipe " after holder
repeat with counter = 10 to 13
show button counter
end repeat
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=132 top=162 right=184 bottom=232
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: zoom
----- HyperTalk script -----
on mouseUp
global holder
put "zoom " after holder
repeat with counter = 14 to 17
show button counter
end repeat
end mouseUp
-- part 7 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=133 top=192 right=214 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: venet. blinds
----- HyperTalk script -----
on mouseUp
global holder
put "venetian blinds" after holder
end mouseUp
-- part 8 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=133 top=222 right=244 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: checkerboard
----- HyperTalk script -----
on mouseUp
global holder
put "checkerboard" after holder
end mouseUp
-- part 9 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=74 top=255 right=277 bottom=174
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: plain
----- HyperTalk script -----
on mouseUp
global holder
put "plain" after holder
end mouseUp
-- part 14 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=215 top=272 right=293 bottom=287
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: up
----- HyperTalk script -----
on mouseUp
global holder
put "up " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 15 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=215 top=299 right=321 bottom=288
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: down
----- HyperTalk script -----
on mouseUp
global holder
put "down " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 16 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=16 top=300 right=322 bottom=88
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: left
----- HyperTalk script -----
on mouseUp
global holder
put "left " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 17 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=412 top=295 right=318 bottom=484
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: right
----- HyperTalk script -----
on mouseUp
global holder
put "right " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 18 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=269 top=130 right=150 bottom=341
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: open
----- HyperTalk script -----
on mouseUp
global holder
put "open " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 19 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=269 top=157 right=178 bottom=341
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: close
----- HyperTalk script -----
on mouseUp
global holder
put "close " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 20 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=269 top=186 right=208 bottom=342
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: in
----- HyperTalk script -----
on mouseUp
global holder
put "in " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 21 (button)
-- low flags: 80
-- high flags: 8003
-- rect: left=270 top=214 right=236 bottom=342
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: out
----- HyperTalk script -----
on mouseUp
global holder
put "out " after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 22 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=369 top=130 right=152 bottom=469
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: very slowly
----- HyperTalk script -----
on mouseUp
global holder
put "very slowly" after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 23 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=370 top=156 right=178 bottom=470
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: slowly
----- HyperTalk script -----
on mouseUp
global holder
put "slowly" after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 24 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=371 top=184 right=206 bottom=471
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: very fast
----- HyperTalk script -----
on mouseUp
global holder
put "very fast" after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp
-- part 25 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=372 top=212 right=234 bottom=472
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: fast
----- HyperTalk script -----
on mouseUp
global holder
put "fast" after holder
put holder & return after field "script-it" of card "main card"
visual effect dissolve to inverse
pop card
end mouseUp